Imports Bussines.Data
Imports Bussines.entity

Public Class usuariosBL
    Dim usuDAL As New usuariosDAL
    Public Function listarUsuario(ByVal condicion As String) As DataTable
        Return usuDAL.listarUsuario(condicion)
    End Function

    Public Function listarUsuarioTodos(ByVal condicion As String) As DataTable
        Return usuDAL.listarUsuarioTodos(condicion)
    End Function
    Public Function listarUsuarioxId(ByVal ID As String) As DataTable
        Return usuDAL.listarUsuarioxId(ID)
    End Function

    Public Function BuscarActiveDirectory(ByVal trab_id As String) As String
        Return usuDAL.BuscarActiveDirectory(trab_id)
    End Function

End Class
